3.104 \(\int \frac{1}{\sqrt{2-3 x} \sqrt{-5+2 x} \sqrt{1+4 x} \sqrt{7+5 x}} \, dx\)

Optimal. Leaf size=71 \[ \frac{2 \sqrt{5 x+7} \text{EllipticF}\left (\tan ^{-1}\left (\frac{\sqrt{4 x+1}}{\sqrt{2} \sqrt{2-3 x}}\right ),-\frac{39}{23}\right )}{\sqrt{253} \sqrt{2 x-5} \sqrt{\frac{5 x+7}{5-2 x}}} \]

[Out]

(2*Sqrt[7 + 5*x]*EllipticF[ArcTan[Sqrt[1 + 4*x]/(Sqrt[2]*Sqrt[2 - 3*x])], -39/23])/(Sqrt[253]*Sqrt[-5 + 2*x]*S
qrt[(7 + 5*x)/(5 - 2*x)])

________________________________________________________________________________________

Rubi [A]  time = 0.0428364, antiderivative size = 71, normalized size of antiderivative = 1., number of steps used = 2, number of rules used = 2, integrand size = 37, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.054, Rules used = {170, 418} \[ \frac{2 \sqrt{5 x+7} F\left (\tan ^{-1}\left (\frac{\sqrt{4 x+1}}{\sqrt{2} \sqrt{2-3 x}}\right )|-\frac{39}{23}\right )}{\sqrt{253} \sqrt{2 x-5} \sqrt{\frac{5 x+7}{5-2 x}}} \]

Antiderivative was successfully verified.

[In]

Int[1/(Sqrt[2 - 3*x]*Sqrt[-5 + 2*x]*Sqrt[1 + 4*x]*Sqrt[7 + 5*x]),x]

[Out]

(2*Sqrt[7 + 5*x]*EllipticF[ArcTan[Sqrt[1 + 4*x]/(Sqrt[2]*Sqrt[2 - 3*x])], -39/23])/(Sqrt[253]*Sqrt[-5 + 2*x]*S
qrt[(7 + 5*x)/(5 - 2*x)])

Rule 170

Int[1/(Sqrt[(a_.) + (b_.)*(x_)]*Sqrt[(c_.) + (d_.)*(x_)]*Sqrt[(e_.) + (f_.)*(x_)]*Sqrt[(g_.) + (h_.)*(x_)]), x
_Symbol] :> Dist[(2*Sqrt[g + h*x]*Sqrt[((b*e - a*f)*(c + d*x))/((d*e - c*f)*(a + b*x))])/((f*g - e*h)*Sqrt[c +
 d*x]*Sqrt[-(((b*e - a*f)*(g + h*x))/((f*g - e*h)*(a + b*x)))]), Subst[Int[1/(Sqrt[1 + ((b*c - a*d)*x^2)/(d*e
- c*f)]*Sqrt[1 - ((b*g - a*h)*x^2)/(f*g - e*h)]), x], x, Sqrt[e + f*x]/Sqrt[a + b*x]], x] /; FreeQ[{a, b, c, d
, e, f, g, h}, x]

Rule 418

Int[1/(Sqrt[(a_) + (b_.)*(x_)^2]*Sqrt[(c_) + (d_.)*(x_)^2]), x_Symbol] :> Simp[(Sqrt[a + b*x^2]*EllipticF[ArcT
an[Rt[d/c, 2]*x], 1 - (b*c)/(a*d)])/(a*Rt[d/c, 2]*Sqrt[c + d*x^2]*Sqrt[(c*(a + b*x^2))/(a*(c + d*x^2))]), x] /
; FreeQ[{a, b, c, d}, x] && PosQ[d/c] && PosQ[b/a] &&  !SimplerSqrtQ[b/a, d/c]

Rubi steps

\begin{align*} \int \frac{1}{\sqrt{2-3 x} \sqrt{-5+2 x} \sqrt{1+4 x} \sqrt{7+5 x}} \, dx &=\frac{\left (\sqrt{\frac{2}{253}} \sqrt{-\frac{-5+2 x}{2-3 x}} \sqrt{7+5 x}\right ) \operatorname{Subst}\left (\int \frac{1}{\sqrt{1+\frac{x^2}{2}} \sqrt{1+\frac{31 x^2}{23}}} \, dx,x,\frac{\sqrt{1+4 x}}{\sqrt{2-3 x}}\right )}{\sqrt{-5+2 x} \sqrt{\frac{7+5 x}{2-3 x}}}\\ &=\frac{2 \sqrt{7+5 x} F\left (\tan ^{-1}\left (\frac{\sqrt{1+4 x}}{\sqrt{2} \sqrt{2-3 x}}\right )|-\frac{39}{23}\right )}{\sqrt{253} \sqrt{-5+2 x} \sqrt{\frac{7+5 x}{5-2 x}}}\\ \end{align*}

Mathematica [A]  time = 0.139292, size = 90, normalized size = 1.27 \[ -\frac{2 \sqrt{4 x+1} \sqrt{\frac{5-2 x}{5 x+7}} \text{EllipticF}\left (\sin ^{-1}\left (\frac{\sqrt{\frac{23}{11}} \sqrt{2-3 x}}{\sqrt{5 x+7}}\right ),-\frac{39}{23}\right )}{\sqrt{253} \sqrt{2 x-5} \sqrt{\frac{4 x+1}{5 x+7}}} \]

Antiderivative was successfully verified.

[In]

Integrate[1/(Sqrt[2 - 3*x]*Sqrt[-5 + 2*x]*Sqrt[1 + 4*x]*Sqrt[7 + 5*x]),x]

[Out]

(-2*Sqrt[1 + 4*x]*Sqrt[(5 - 2*x)/(7 + 5*x)]*EllipticF[ArcSin[(Sqrt[23/11]*Sqrt[2 - 3*x])/Sqrt[7 + 5*x]], -39/2
3])/(Sqrt[253]*Sqrt[-5 + 2*x]*Sqrt[(1 + 4*x)/(7 + 5*x)])

________________________________________________________________________________________

Maple [A]  time = 0.022, size = 134, normalized size = 1.9 \begin{align*}{\frac{2\,\sqrt{13}\sqrt{3}\sqrt{11}}{12870\,{x}^{3}-22737\,{x}^{2}-35607\,x+30030}{\it EllipticF} \left ({\frac{\sqrt{31}\sqrt{11}}{31}\sqrt{{\frac{7+5\,x}{4\,x+1}}}},{\frac{\sqrt{31}\sqrt{78}}{39}} \right ) \sqrt{{\frac{-2+3\,x}{4\,x+1}}}\sqrt{{\frac{2\,x-5}{4\,x+1}}}\sqrt{{\frac{7+5\,x}{4\,x+1}}} \left ( 4\,x+1 \right ) ^{{\frac{3}{2}}}\sqrt{2\,x-5}\sqrt{2-3\,x}\sqrt{7+5\,x}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(7+5*x)^(1/2)/(2-3*x)^(1/2)/(2*x-5)^(1/2)/(4*x+1)^(1/2),x)

[Out]

2/429*EllipticF(1/31*31^(1/2)*11^(1/2)*((7+5*x)/(4*x+1))^(1/2),1/39*31^(1/2)*78^(1/2))*((-2+3*x)/(4*x+1))^(1/2
)*((2*x-5)/(4*x+1))^(1/2)*13^(1/2)*3^(1/2)*((7+5*x)/(4*x+1))^(1/2)*11^(1/2)*(4*x+1)^(3/2)*(2*x-5)^(1/2)*(2-3*x
)^(1/2)*(7+5*x)^(1/2)/(30*x^3-53*x^2-83*x+70)

________________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{1}{\sqrt{5 \, x + 7} \sqrt{4 \, x + 1} \sqrt{2 \, x - 5} \sqrt{-3 \, x + 2}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(7+5*x)^(1/2)/(2-3*x)^(1/2)/(-5+2*x)^(1/2)/(1+4*x)^(1/2),x, algorithm="maxima")

[Out]

integrate(1/(sqrt(5*x + 7)*sqrt(4*x + 1)*sqrt(2*x - 5)*sqrt(-3*x + 2)), x)

________________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left (-\frac{\sqrt{5 \, x + 7} \sqrt{4 \, x + 1} \sqrt{2 \, x - 5} \sqrt{-3 \, x + 2}}{120 \, x^{4} - 182 \, x^{3} - 385 \, x^{2} + 197 \, x + 70}, x\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(7+5*x)^(1/2)/(2-3*x)^(1/2)/(-5+2*x)^(1/2)/(1+4*x)^(1/2),x, algorithm="fricas")

[Out]

integral(-sqrt(5*x + 7)*sqrt(4*x + 1)*sqrt(2*x - 5)*sqrt(-3*x + 2)/(120*x^4 - 182*x^3 - 385*x^2 + 197*x + 70),
 x)

________________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{1}{\sqrt{2 - 3 x} \sqrt{2 x - 5} \sqrt{4 x + 1} \sqrt{5 x + 7}}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(7+5*x)**(1/2)/(2-3*x)**(1/2)/(-5+2*x)**(1/2)/(1+4*x)**(1/2),x)

[Out]

Integral(1/(sqrt(2 - 3*x)*sqrt(2*x - 5)*sqrt(4*x + 1)*sqrt(5*x + 7)), x)

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{1}{\sqrt{5 \, x + 7} \sqrt{4 \, x + 1} \sqrt{2 \, x - 5} \sqrt{-3 \, x + 2}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(7+5*x)^(1/2)/(2-3*x)^(1/2)/(-5+2*x)^(1/2)/(1+4*x)^(1/2),x, algorithm="giac")

[Out]

integrate(1/(sqrt(5*x + 7)*sqrt(4*x + 1)*sqrt(2*x - 5)*sqrt(-3*x + 2)), x)